home *** CD-ROM | disk | FTP | other *** search
/ MacFormat 1997 April / macformat-049.iso / mac / Demos / Print Artist Demo / PA12-Mac.Dxr / 00158.ls < prev    next >
Encoding:
Text File  |  1996-10-03  |  602 b   |  24 lines
  1. on exitFrame
  2.   global playMode, loadNext, subPageWait
  3.   startTimer()
  4.   if (playMode = "64KMemOK") or (playMode = "PPCMemOK") then
  5.     if loadNext = 0 then
  6.       nothing()
  7.     else
  8.       if loadNext = 1 then
  9.         unLoadCast()
  10.         preLoad(preLoad, label("layout3"), label("layout3") + 11)
  11.       end if
  12.     end if
  13.     wait(subPageWait - the timer)
  14.     go(#next)
  15.   else
  16.     unLoadCast()
  17.     preLoad(label("layout3") + 11, label("layout3") + 11)
  18.     puppetTransition(23, 1, 1)
  19.     set the purgePriority of member "Pam2-8b" to 3
  20.     sound fadeOut 2, 3 * 60
  21.     go(marker("layout3") + 11)
  22.   end if
  23. end
  24.